home *** CD-ROM | disk | FTP | other *** search
/ The Mac 13 / the-mac-13.iso / On The Rom / 100 Best Mac CD-ROMs Selection / UNZIP-DEMO / ZIPFILES / shared.Dir / 00883.ls < prev    next >
Encoding:
Text File  |  1995-06-15  |  474 b   |  22 lines
  1. on guygo
  2.   set a to 10
  3.   repeat while a < 70
  4.     set the locH of sprite 36 to the locH of sprite 36 + a
  5.     updateStage()
  6.     startTimer()
  7.     repeat while the timer < 5
  8.     end repeat
  9.     set a to a + 10
  10.   end repeat
  11.   set the castNum of sprite 35 to 965
  12.   set the castNum of sprite 37 to 960
  13.   set the castNum of sprite 38 to 960
  14.   updateStage()
  15.   startTimer()
  16.   repeat while the timer < 15
  17.   end repeat
  18.   set the castNum of sprite 35 to 966
  19.   updateStage()
  20.   pause()
  21. end
  22.